<%
	Dim conn
	Set conn=server.CreateObject("adodb.connection")
	conn.connectionstring="provider=microsoft.jet.OLEDB.4.0;data source=" & server.mapPath("db/shujuku.mdb")
	conn.open
%>
<meta name="viewport" content="width=device-width, initial-scale=1.0, minimum-scale=0.5, maximum-scale=2.0, user-scalable=no" />
<meta name="apple-mobile-web-app-capable" content="yes">
<meta name="apple-mobile-web-app-status-bar-style" content="black">
<meta name="format-detection" content="telephone=no">
